home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / biblio / tib / inputs / intext.ttx < prev    next >
Text File  |  1989-03-28  |  11KB  |  140 lines
  1. %intext format macros
  2. %[author, title, etc., volume (date) pages gov't no., other]
  3.  
  4. \def\journalarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc%
  5.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  6.        \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup\fi%
  7.         \if\ztest\present\zstr\fi%
  8.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  9.          \if\etest\present\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  10.           \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
  11.            \if\Vtest\present\if\Jtest\present\hskip.16667em\else\Comma\fi\bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
  12.             \if\Dtest\present\hskip.16667em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
  13.              \if\Ptest\present\bgroup, \Pstr\egroup\def\Comma{, }\fi%
  14.               \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
  15.                \if\jtest\present\Comma\bgroup\Tomefont\jstr\/\egroup\def\Comma{, }\fi%
  16.                 \if\vtest\present\if\jtest\present\hskip.16667em\else\Comma\fi\bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
  17.                  \if\dtest\present\hskip.16667em(\bgroup\dstr\egroup)\def\Comma{, }\fi%
  18.                   \if\ptest\present\bgroup, \pstr\egroup\def\Comma{, }\fi%
  19.                    \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  20.                     \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
  21.                      \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
  22.                       \gdef\Comma{\unskip; }\gdef\zstr{}}%
  23.  
  24. \def\conferencereportformat{\Reffont\let\uchyph=1\parindent=1.25pc%
  25.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  26.        \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup\fi%
  27.         \if\ztest\present\zstr\fi%
  28.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  29.          \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
  30.           \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  31.            \if\Dtest\present\hskip.16667em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
  32.             \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
  33.              \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
  34.               \gdef\Comma{\unskip; }\gdef\zstr{}}%
  35.  
  36. \def\bookarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc%
  37.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  38.        \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup\fi%
  39.         \if\ztest\present\zstr\fi%
  40.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  41.          \if\etest\present\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  42.           \if\Btest\present\Comma in \bgroup\Tomefont\Bstr\/\egroup\def\Comma{\unskip, }\fi%
  43.            \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
  44.             \if\Etest\present\Comma\bgroup\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }\fi%
  45.              \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
  46.               \if\Vtest\present\bgroup\hskip.16667em\#\Volfont\Vstr\egroup\def\Comma{, }\fi%
  47.                \if\Ntest\present\bgroup\hskip.16667em\#\Volfont\Nstr\egroup\def\Comma{, }\fi%
  48.                 \if\Itest\present\Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  49.                  \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  50.                   \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  51.                    \if\Ptest\present\Comma\Pstr\def\Comma{, }\fi%
  52.                     \if\ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  53.                      \if\btest\present\Comma in \bgroup\Tomefont\bstr\egroup\def\Comma{, }\fi%
  54.                        \if\atest\present\Comma\bgroup\astr\egroup\unskip, \if\acnt\present eds.\else ed.\fi\def\Comma{, }\fi%
  55.                         \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
  56.                          \if\vtest\present\bgroup\hskip.16667em\#\Volfont\vstr\egroup\def\Comma{, }\fi%
  57.                           \if\ntest\present\bgroup\hskip.16667em\#\Volfont\nstr\egroup\def\Comma{, }\fi%
  58.                            \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  59.                             \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  60.                              \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  61.                               \if\ptest\present\Comma\pstr\def\Comma{, }\fi%
  62.                                \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  63.                                 \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
  64.                                  \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
  65.                                   \gdef\Comma{\unskip; }\gdef\zstr{}}%
  66.  
  67. \def\bookformat{\Reffont\let\uchyph=1\parindent=1.25pc%
  68.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  69.        \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup%
  70.             \else\if\Etest\present\bgroup\Comma\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi%
  71.                   \else\if\Itest\present\Comma\bgroup\Authfont\Istr\egroup\fi\fi\fi%
  72.          \if\ztest\present\zstr\fi%
  73.           \if\Ttest\present\Comma\bgroup\Tomefont\Tstr\/\egroup\def\Comma{\unskip, }%
  74.                 \else\if\Btest\present\Comma\bgroup\Tomefont\Bstr\/\egroup\def\Comma{\unskip, }\fi\fi%
  75.             \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
  76.              \if\etest\present\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  77.               \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
  78.                \if\Vtest\present\bgroup\hskip.16667em\#\Volfont\Vstr\egroup\def\Comma{, }\fi%
  79.                 \if\Ntest\present\bgroup\hskip.16667em\#\Volfont\Nstr\egroup\def\Comma{, }\fi%
  80.                  \if\Atest\present\if\Itest\present
  81.                          \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi%
  82.                       \else\if\Etest\present\if\Itest\present
  83.                               \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi\fi\fi%
  84.                      \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  85.                       \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  86.                        \if\ttest\present\Comma\bgroup\Tomefont\tstr\egroup\def\Comma{, }%
  87.                              \else\if\btest\present\Comma\bgroup\Tomefont\bstr\egroup\def\Comma{, }\fi\fi%
  88.                           \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
  89.                            \if\vtest\present\bgroup\hskip.16667em\#\Volfont\vstr\egroup\def\Comma{, }\fi%
  90.                             \if\ntest\present\bgroup\hskip.16667em\#\Volfont\nstr\egroup\def\Comma{, }\fi%
  91.                              \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  92.                               \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  93.                                \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  94.                                 \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  95.                                  \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
  96.                                   \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
  97.                                   \gdef\Comma{\unskip; }\gdef\zstr{}}%
  98.  
  99. \def\technicalreportformat{\Reffont\let\uchyph=1\parindent=1.25pc%
  100.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  101.        \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup%
  102.             \else\if\Etest\present\bgroup\Comma\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi%
  103.                   \else\if\Itest\present\Comma\bgroup\Authfont\Istr\egroup\fi\fi\fi%
  104.          \if\ztest\present\zstr\fi%
  105.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  106.            \if\Atest\present\if\Itest\present
  107.                    \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  108.                 \else\if\Etest\present\if\Itest\present
  109.                         \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
  110.             \if\Rtest\present\Comma\bgroup\Rstr\egroup\def\Comma{, }\fi%
  111.              \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  112.               \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  113.                \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
  114.                 \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  115.                  \if\rtest\present\Comma\bgroup\rstr\egroup\def\Comma{, }\fi%
  116.                   \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  117.                    \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  118.                     \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  119.                      \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
  120.                       \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
  121.                        \gdef\Comma{\unskip; }\gdef\zstr{}}%
  122.  
  123. \def\otherformat{\Reffont\let\uchyph=1\parindent=1.25pc%
  124.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  125.        \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup%
  126.             \else\if\Etest\present\Comma\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi%
  127.                   \else\if\Itest\present\Comma\bgroup\Authfont\Istr\egroup\fi\fi\fi%
  128.          \if\ztest\present\zstr\fi%
  129.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  130.             \if\Atest\present\if\Itest\present
  131.                     \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  132.                  \else\if\Etest\present\if\Itest\present
  133.                          \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
  134.                  \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  135.                   \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  136.                    \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  137.                     \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
  138.                      \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
  139.                       \gdef\Comma{\unskip; }\gdef\zstr{}}%
  140.